(quit-window): Fixed FRAME to be the frame and never window.

diff --git a/lisp/window.el b/lisp/window.el
index 025f0a82d10c3bbdd2c1dfc04daa04cab9f6bcbf..bd3727cd3f7b36951b81e1ea9780ba7ed20cef42 100644 (file)
--- a/lisp/window.el
+++ b/lisp/window.el
@@ -303,7 +303,7 @@ If WINDOW is non-nil, it specifies a window; we delete that window,
 and the buffer that is killed or buried is the one in that window."
   (interactive "P")
   (let ((buffer (window-buffer window))
-       (frame (if window (window-frame window) (selected-window)))
+       (frame (window-frame (or window (selected-window))))
        (window-solitary
         (save-selected-window
           (if window